home *** CD-ROM | disk | FTP | other *** search
/ NetNews Offline 2 / NetNews Offline Volume 2.iso / news / comp / lang / rexx / 72 < prev    next >
Encoding:
Text File  |  1996-08-06  |  1.4 KB  |  53 lines
  1. Path: ralph.vnet.net!usenet
  2. From: duckula@vnet.net (Len Roberts)
  3. Newsgroups: comp.lang.rexx
  4. Subject: Re: Rexx
  5. Date: Thu, 04 Jan 1996 15:59:22 GMT
  6. Organization: Vnet Internet Access, Charlotte, NC - info@char.vnet.net
  7. Distribution: inet
  8. Message-ID: <4ci7ph$9rv@ralph.vnet.net>
  9. References: <4cf3bs$dmq@mn5.swip.net>
  10. NNTP-Posting-Host: anatidae.vnet.net
  11. X-Newsreader: Forte Free Agent 1.0.82
  12.  
  13. ptp@hnc.se (Paul Secrett) wrote:
  14.  
  15. >At the moment I'm trying to get a simple loop to work, and it wont. I can get 
  16. >the .cmd file to execute the .exe file after which it prints to screen "Would 
  17. >you like to rerun the program?" if I write yes here then it should "goto 
  18. >start" and rerun the prog, but it wont, it just exits the .cmd. There is no 
  19. >error message so I don't know what I'm doing wrong. I can write do forever 
  20. >and then ctrl-break, buts thats messy, I'm sure there must be someone out 
  21. >there that can help me with this, if you consider this problem too "easy" for 
  22. >this NG then just mail your help to me at the address below.
  23.  
  24. >Here is what I'm doing:
  25.  
  26. >a='x:\path\file.exe :params'
  27. >b=exit
  28.  
  29. >a    
  30. >say do you want to rerun the program
  31. >pull ans
  32. >if ans ='yes'
  33. >then do a
  34. >else do b
  35. >end
  36.  
  37. >Regards.Paul        ptp@hnc.se        TeamOS/2 Member  
  38.  
  39. Try this:
  40.  
  41. do forever
  42.     a
  43.     say 'Do you want to run the program again?'
  44.     pull ans
  45.     if ans = 'no' then leave
  46. end
  47. *rest of exec* 
  48.  
  49. Len Roberts
  50. duskula@vnet.net
  51.  
  52.  
  53.